home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-05
/
fp2_x102.zip
/
FP2_XLIB.DOC
< prev
next >
Wrap
Text File
|
1991-08-16
|
5KB
|
121 lines
FP2_XLIB.PRG release version 1.02
Date: August 18, 1991
Author: Edward M. Rauh
Gamboge International Inc.
300 Long Beach Boulevard
Stratford, CT 06497
Fax: 203/386-9333
FoxPro 2.0 specific UDF library - general function library 1 for LAN
environments. The key to making these functions available is to activate
the programs by the following two lines of code:
SET PROCEDURE TO FP2_XLIB
DO STD_INIT
In order to clean up after itself, replace any uses of the QUIT verb with:
DO PRG_EXIT WITH ''
Included routines:
STD_INIT A standard initialization call that sets up a
working environment and enhanced error-recovery
handlers.
STD_SETS A routine to restore the standard runtime environment,
used by STD_INIT. It will restore the ON ERROR
handler if it was previously invoked by STD_INIT
POP_HELP Routine used by STD_INIT to Pop-up FoxPro 2 style
help if an appropriate help file is active
POP_CALC Routine used by STD_INIT to Pop-up the FoxPro
calculator desktop accessory
CALC_KBD Routine used by STD_INIT to insert the content of
the calculator into a FxoPro edit field or variable
PRG_EXIT An intended replacement for QUIT that reverses the
effects of STD_INIT setup and cleans up before
quitting.
FILLOCK() A recovering file-locking routine
RECLOCK() A recovering record-locking routine
ERR_HAND The enhanced error handling routine
INSTRUCT UDF to place a line of text on line 24 of the screen
APPROVED() UDF to get the answer to a Yes/No question
ASKCHAR() UDF to get a one-character reply matching a set
of allowed responses
APPBLANK() A recovering APPEND BLANK that minimizes the DBF
header lock time and allows for failure
USE_DB() UDF for recoverable USE statement execution
SAVE_ENV() UDF to save partial runtime environment as a string
REST_ENV UDF to restore runtime environment from a SAVE_ENV()
string
SEL_PDEV UDF for popup printer control
SET_PDEV UDF used by SEL_PDEV to set print devices
MNG_FORM UDF used by SEL_PDEV to control form alignment, etc.
NET_CTRL UDF to run various Novell Print Control Utilities
PDEV_DSP UDF that displays the current print device status
PICKONE() UDF to select a record from a popup scrolling box.
Reentrant, allows for execution of procedures on
selection, key searches, more. Lots of code to
read, even semi-well documented!
PICKIT Procedures used by PICKONE()
HIDISP
DISP
DISPRECS
PSB_ERR
VAL_CRCD() Credit card validation UDF using modulo-10 calculation
VAL_ISBN() ISBN validation using modulo-11 calculation
CHG_DIR Change directories on a non-default drive, optionally
seting the new path to the default path. Does not
use RUN/!, so it runs no matter how tight memory is.
ISBN_CKD() Returns the proper checkdigit to convert a 9-digit
book number to an ISBN.
The job server routines will be released in a separate library that will be
dependant on the use of FP2_XLIB routines. In all likelyhood, it will be
released as a commercial product along with a set of Novell/NetBIOS calls
implemented through the C API.
This code is released in the public domain. You are free to modify the code
as you see fit. If you modify it and it breaks, you own both halves. If
bugs are reported, I will attempt to correct them; I assume no responsibility
for your use of the code. It is released as source code specifically so that
you can make it do what you want it to; if you come up with a better way to
do things, let me know and I may incorporate your changes into the next
revision. Better yet, release your own version, IN SOURCE CODE FORMAT!
Ed Rauh
PS I don't list a phone number - if you have reports/requests, send them
to me by MAIL, or on the FidoNet DBASE conference, or the ILink
Database conference, or by fax.
PPS Anyone who wants to write a documentation file for this stuff, feel
free to do so. You'll get just as much reward as I did for writing
the routines in the first place...